--[[ 编码: WMS-20-03 名称: 入库单-删除后 作者:HAN 日期:2025-1-29 级别:固定 (说明本段代码在项目中不太会变化) 函数: AfterDataObjDelete 功能: - 删除【入库单明细】 - 清除最大行号记录 更改记录: --]] json = require ("json") mobox = require ("OILua_JavelinExt") m3 = require("oi_base_mobox") function AfterDataObjDelete ( strLuaDEID ) local nRet, strRetInfo -- 获取 S_NO nRet, strRetInfo = mobox.getCurEditDataObjAttr( strLuaDEID, "S_NO" ) if ( nRet ~= 0 ) then lua.Error( strLuaDEID, debug.getinfo(1), "获取当前编辑属性失败! "..strRetInfo ) end local obj_attrs = json.decode( strRetInfo ) local io_no = obj_attrs[1].value -- 入库单编号 if ( io_no ~= "" ) then local strCondition = "S_IO_NO = '"..io_no.."'" nRet, strRetInfo = mobox.deleteDataObject( strLuaDEID, "Inbound_Detail", strCondition ) if ( nRet ~= 0) then lua.Error( strLuaDEID, debug.getinfo(1), "删除作业相关的【入库单明细】失败! "..strRetInfo ) end -- 清除最大行号记录 nRet, strRetInfo = mobox.removeSerialNumber( "行号", io_no ) if ( nRet ~= 0 ) then lua.Error( strLuaDEID, debug.getinfo(1), "removeSerialNumber() 失败! "..strRetInfo ) end end end